inherited frmCadOperacoes: TfrmCadOperacoes
  Left = 432
  Top = 196
  Width = 659
  Height = 446
  Caption = 'Cadastro de Opera'#231#245'es'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited pgcCadastro: TcxPageControl
    Width = 643
    Height = 382
    ActivePage = tbsEdita
    ClientRectBottom = 377
    ClientRectRight = 638
    inherited tbsLista: TcxTabSheet
      inherited Grid: TcxGrid
        Width = 633
        Height = 332
        inherited GridDBBandedTableView2: TcxGridDBBandedTableView
          object GridDBBandedTableView2CODIGO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'CODIGO'
            Position.BandIndex = 0
            Position.ColIndex = 0
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2NOME: TcxGridDBBandedColumn
            DataBinding.FieldName = 'NOME'
            Width = 247
            Position.BandIndex = 0
            Position.ColIndex = 1
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2CONTA: TcxGridDBBandedColumn
            DataBinding.FieldName = 'CONTA'
            Position.BandIndex = 0
            Position.ColIndex = 2
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2NOME_CONTA: TcxGridDBBandedColumn
            DataBinding.FieldName = 'NOME_CONTA'
            Position.BandIndex = 0
            Position.ColIndex = 3
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2TIPO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'TIPO'
            Position.BandIndex = 0
            Position.ColIndex = 4
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2GERA_CREDITO_ICMS: TcxGridDBBandedColumn
            DataBinding.FieldName = 'GERA_CREDITO_ICMS'
            Position.BandIndex = 0
            Position.ColIndex = 5
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2MOVIMENTA_ESTOQUE: TcxGridDBBandedColumn
            DataBinding.FieldName = 'MOVIMENTA_ESTOQUE'
            Position.BandIndex = 0
            Position.ColIndex = 6
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2PERDA_CONSUMO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'PERDA_CONSUMO'
            Position.BandIndex = 0
            Position.ColIndex = 7
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2VENDA_DIRETA: TcxGridDBBandedColumn
            DataBinding.FieldName = 'VENDA_DIRETA'
            Position.BandIndex = 0
            Position.ColIndex = 8
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2ENTRADA: TcxGridDBBandedColumn
            DataBinding.FieldName = 'ENTRADA'
            Position.BandIndex = 0
            Position.ColIndex = 9
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2SAIDA: TcxGridDBBandedColumn
            DataBinding.FieldName = 'SAIDA'
            Position.BandIndex = 0
            Position.ColIndex = 10
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2INSUMOS: TcxGridDBBandedColumn
            DataBinding.FieldName = 'INSUMOS'
            Position.BandIndex = 0
            Position.ColIndex = 11
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2INSUMOS_OUTROS_ANIMAIS: TcxGridDBBandedColumn
            DataBinding.FieldName = 'INSUMOS_OUTROS_ANIMAIS'
            Position.BandIndex = 0
            Position.ColIndex = 12
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2CODIGO_TBL_DAP: TcxGridDBBandedColumn
            DataBinding.FieldName = 'CODIGO_TBL_DAP'
            Position.BandIndex = 0
            Position.ColIndex = 13
            Position.RowIndex = 0
          end
        end
      end
      inherited Panel1: TPanel
        Width = 633
      end
    end
    inherited tbsEdita: TcxTabSheet
      inherited Panel2: TPanel
        Width = 633
        Height = 349
        object Panel3: TPanel
          Left = 1
          Top = 1
          Width = 631
          Height = 115
          Align = alTop
          BevelOuter = bvNone
          TabOrder = 0
          object btnConta: TcxButtonEdit
            Left = 359
            Top = 74
            TabStop = False
            Properties.Buttons = <
              item
                Caption = 'F9'
                Default = True
                Kind = bkText
              end>
            Properties.ViewStyle = vsButtonsOnly
            TabOrder = 5
            Text = 'btnLogradouro'
            OnClick = btnContaClick
            Width = 25
          end
          object cbConta: TcxDBLookupComboBox
            Left = 8
            Top = 74
            DataBinding.DataField = 'CONTA'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            Properties.KeyFieldNames = 'CODIGO'
            Properties.ListColumns = <
              item
                FieldName = 'NOME'
              end
              item
                FieldName = 'CODIGO_STR'
              end
              item
                FieldName = 'TIPO'
              end>
            Properties.ListSource = dsConta
            TabOrder = 3
            Width = 353
          end
          object cxLabel7: TcxLabel
            Left = 8
            Top = 58
            Caption = 'Conta Padr'#227'o'
            Transparent = True
          end
          object edtNome: TcxDBTextEdit
            Left = 76
            Top = 32
            DataBinding.DataField = 'NOME'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            TabOrder = 1
            Width = 333
          end
          object cxLabel2: TcxLabel
            Left = 76
            Top = 15
            Caption = 'Nome'
            Transparent = True
          end
          object cxDBTextEdit1: TcxDBTextEdit
            Left = 8
            Top = 32
            DataBinding.DataField = 'CODIGO'
            DataBinding.DataSource = dsRegistro
            Enabled = False
            Style.Color = clWindow
            TabOrder = 0
            Width = 65
          end
          object cxLabel1: TcxLabel
            Left = 8
            Top = 15
            Caption = 'C'#243'digo'
            Transparent = True
          end
          object cxDBRadioGroup1: TcxDBRadioGroup
            Left = 400
            Top = 54
            Caption = 'Tipo de Opera'#231#227'o'
            DataBinding.DataField = 'TIPO'
            DataBinding.DataSource = dsRegistro
            Properties.Columns = 3
            Properties.DefaultValue = 'A'
            Properties.Items = <
              item
                Caption = 'Agr'#237'cola'
                Value = 'A'
              end
              item
                Caption = 'Pecu'#225'ria'
                Value = 'P'
              end
              item
                Caption = 'Outros'
                Value = 'O'
              end>
            TabOrder = 4
            Height = 49
            Width = 241
          end
          object cxLabel3: TcxLabel
            Left = 414
            Top = 16
            Caption = 'C'#243'd TBL. DAP'
            Transparent = True
          end
          object cxDBComboBox1: TcxDBComboBox
            Left = 416
            Top = 32
            DataBinding.DataField = 'CODIGO_TBL_DAP'
            DataBinding.DataSource = dsRegistro
            Properties.Items.Strings = (
              '01 - Compras Internas'
              '02 - Compras Interestad./Importa'#231#227'o'
              '03 - Entradas Transferencia'
              '04 - Entradas Arrendamento/Parceria'
              '05 - Entradas Heran'#231'a/Doa'#231#227'o'
              '06 - Retorno de Leil'#227'o'
              '07 - Entradas Retorno Exposicao/Rodeio/Outros'
              '08 - Entradas Devolucao de Deposito'
              '09 - Entradas Exterior (Importacao)'
              '10 - Entradas - Outras'
              '11 - Entradas Insumos'
              '51 - Vendas Internas'
              '52 - Vendas Interestaduais'
              '53 - Sa'#237'das por Transferencias'
              '54 - Sa'#237'das Arrendamento/Parceria'
              '55 - Sa'#237'das por Heran'#231'a/Doa'#231#227'o'
              '56 - Remessa para Leil'#227'o'
              '57 - Saidas Exposicao/Rodeio/Outros'
              '58 - Saidas para Deposito'
              '59 - Saidas Exterior (Exportacao)'
              '60 - Saidas - Outras'
              '61 - Saidas Insumos'
              '62 - Saidas Gado Bov/Buf - Consumo Proprio')
            TabOrder = 2
            Width = 225
          end
        end
        object pgcParametros: TcxPageControl
          Left = 1
          Top = 116
          Width = 631
          Height = 232
          ActivePage = tbsPecuaria
          Align = alClient
          TabOrder = 1
          ClientRectBottom = 227
          ClientRectLeft = 5
          ClientRectRight = 626
          ClientRectTop = 28
          object tbsGerais: TcxTabSheet
            Caption = 'Par'#226'metros Gerais'
            ImageIndex = 2
            object cxGroupBox1: TcxGroupBox
              Left = 8
              Top = 2
              Caption = 'Par'#226'metros'
              TabOrder = 0
              Height = 167
              Width = 161
              object cxDBCheckBox1: TcxDBCheckBox
                Left = 16
                Top = 16
                Hint = 
                  'Par'#226'metro determinar'#225' se NF que utiliza a opera'#231#227'o constar'#225' na l' +
                  'istagem do relat'#243'rio SOCRED.'
                Caption = 'Cr'#233'dito ICMS'
                DataBinding.DataField = 'GERA_CREDITO_ICMS'
                DataBinding.DataSource = dsRegistro
                ParentShowHint = False
                Properties.ValueChecked = 'S'
                Properties.ValueUnchecked = 'N'
                ShowHint = True
                TabOrder = 0
                Transparent = True
                Width = 89
              end
              object cxDBCheckBox2: TcxDBCheckBox
                Left = 16
                Top = 40
                Hint = 
                  'Se faturamentos vinculados a opera'#231#227'o ir'#227'o movimentar estoque ou' +
                  ' n'#227'o.'
                Caption = 'Mov. Estoque'
                DataBinding.DataField = 'MOVIMENTA_ESTOQUE'
                DataBinding.DataSource = dsRegistro
                ParentShowHint = False
                Properties.ValueChecked = 'S'
                Properties.ValueUnchecked = 'N'
                ShowHint = True
                TabOrder = 1
                Transparent = True
                Width = 96
              end
              object cxDBCheckBox3: TcxDBCheckBox
                Left = 16
                Top = 64
                Hint = 
                  'Par'#226'metro utilizado para calcular o valor total de perdas ou con' +
                  'sumo na exibi'#231#227'o das DAP(s) Agr'#237'cola e Pecu'#225'ria.'
                Caption = 'Perda/Consumo'
                DataBinding.DataField = 'PERDA_CONSUMO'
                DataBinding.DataSource = dsRegistro
                ParentShowHint = False
                Properties.ValueChecked = 'S'
                Properties.ValueUnchecked = 'N'
                ShowHint = True
                TabOrder = 2
                Transparent = True
                Width = 104
              end
              object cxDBCheckBox4: TcxDBCheckBox
                Left = 16
                Top = 88
                Hint = 
                  'Par'#226'metro determinar'#225' se NFs vinculadas a opera'#231#227'o ir'#227'o totaliza' +
                  'r como insumos na exporta'#231#227'o do arquivo DAPCAD.txt'
                Caption = 'Insumos'
                DataBinding.DataField = 'INSUMOS'
                DataBinding.DataSource = dsRegistro
                ParentShowHint = False
                Properties.ValueChecked = 'S'
                Properties.ValueUnchecked = 'N'
                ShowHint = True
                TabOrder = 3
                Transparent = True
                Width = 89
              end
              object cxDBCheckBox7: TcxDBCheckBox
                Left = 16
                Top = 112
                Hint = 
                  'Par'#226'metro determinar'#225' se NFs vinculadas a opera'#231#227'o ir'#227'o totaliza' +
                  'r como Insumos de Outros Animais na exporta'#231#227'o do arquivo DAPCAD' +
                  '.txt'
                Caption = 'Ins. Out. Animais'
                DataBinding.DataField = 'INSUMOS_OUTROS_ANIMAIS'
                DataBinding.DataSource = dsRegistro
                ParentShowHint = False
                Properties.ValueChecked = 'S'
                Properties.ValueUnchecked = 'N'
                ShowHint = True
                TabOrder = 4
                Transparent = True
                Width = 104
              end
              object cxDBCheckBox8: TcxDBCheckBox
                Left = 16
                Top = 136
                Hint = 
                  'Par'#226'metro determinar'#225' se NFs vinculadas a opera'#231#227'o ir'#227'o totaliza' +
                  'r no relat'#243'rio de movimenta'#231#227'o de produtos.'
                Caption = 'Ttl. Rel. Mov. Produtos'
                DataBinding.DataField = 'TOTALIZA_RELATORIO_MOV_PRODUTO'
                DataBinding.DataSource = dsRegistro
                ParentShowHint = False
                Properties.ValueChecked = 'S'
                Properties.ValueUnchecked = 'N'
                ShowHint = True
                TabOrder = 5
                Transparent = True
                Width = 137
              end
            end
            object rdTipoMovto: TcxCheckGroup
              Left = 176
              Top = 2
              Hint = 
                'Uma mesma opera'#231#227'o poder'#225' ser de entrada e sa'#237'da ou seja de part' +
                'ida dobrada.'
              Caption = 'Entrada/Saida'
              ParentShowHint = False
              Properties.Items = <>
              ShowHint = True
              TabOrder = 1
              Height = 49
              Width = 185
            end
            object cxDBRadioGroup3: TcxDBRadioGroup
              Left = 176
              Top = 56
              Hint = 'Par'#226'metro determinar'#225' o tipo da circula'#231#227'o da mercadoria.'
              Caption = 'Tipo Circula'#231#227'o'
              DataBinding.DataField = 'TIPO_MOVTO'
              DataBinding.DataSource = dsRegistro
              ParentShowHint = False
              Properties.Columns = 2
              Properties.DefaultValue = 'A'
              Properties.Items = <
                item
                  Caption = 'Estadual'
                  Value = 'E'
                end
                item
                  Caption = 'Interestadual'
                  Value = 'I'
                end>
              ShowHint = True
              TabOrder = 2
              Height = 49
              Width = 185
            end
            object cxDBCheckBox6: TcxDBCheckBox
              Left = 272
              Top = 23
              Caption = 'Sa'#237'da'
              DataBinding.DataField = 'SAIDA'
              DataBinding.DataSource = dsRegistro
              ParentShowHint = False
              Properties.ValueChecked = 'S'
              Properties.ValueUnchecked = 'N'
              ShowHint = True
              TabOrder = 3
              Transparent = True
              Width = 65
            end
            object cxDBCheckBox5: TcxDBCheckBox
              Left = 193
              Top = 23
              Caption = 'Entrada'
              DataBinding.DataField = 'ENTRADA'
              DataBinding.DataSource = dsRegistro
              ParentShowHint = False
              Properties.ValueChecked = 'S'
              Properties.ValueUnchecked = 'N'
              ShowHint = True
              TabOrder = 4
              Transparent = True
              Width = 61
            end
          end
          object tbsPecuaria: TcxTabSheet
            Caption = 'Par'#226'metros Pecu'#225'ria'
            ImageIndex = 1
            object rdExpPecuaria: TcxDBRadioGroup
              Left = 8
              Top = 8
              Hint = 
                'Par'#226'metro utilizado na composi'#231#227'o da Dap Pecu'#225'ria e na exporta'#231#227 +
                'o do arquivo DAPBOV.txt'
              Caption = 'Exp. Dap. Pecu'#225'ria '
              DataBinding.DataField = 'PEC_DAP_MOVTO'
              DataBinding.DataSource = dsRegistro
              ParentShowHint = False
              Properties.Columns = 2
              Properties.Items = <
                item
                  Caption = 'Nascimento/Morte'
                  Value = 1
                  Tag = 1
                end
                item
                  Caption = 'Interna'
                  Value = 2
                  Tag = 2
                end
                item
                  Caption = 'Ext/Exp'
                  Value = 3
                  Tag = 3
                end
                item
                  Caption = 'Trf'
                  Value = 4
                  Tag = 4
                end
                item
                  Caption = 'Arr/Prc'
                  Value = 5
                end
                item
                  Caption = 'Her/Doa'
                  Value = 6
                end
                item
                  Caption = 'Era'
                  Value = 7
                end>
              ShowHint = True
              TabOrder = 0
              Height = 129
              Width = 321
            end
          end
          object tbsAgricola: TcxTabSheet
            Caption = 'Par'#226'metros Agr'#237'cola'
            ImageIndex = 0
          end
        end
      end
    end
  end
  inherited dsPesquisa: TDataSource
    Left = 448
    Top = 328
  end
  inherited dsRegistro: TDataSource
    Left = 480
    Top = 328
  end
  inherited dtEdit: TIBDataSet
    OnNewRecord = dtEditNewRecord
    DeleteSQL.Strings = (
      'delete from operacoes'
      'where'
      '  CODIGO = :OLD_CODIGO')
    InsertSQL.Strings = (
      'insert into operacoes'
      
        '  (CODIGO, CODIGO_TBL_DAP, CONTA, ENTRADA, GERA_CREDITO_ICMS, IN' +
        'SUMOS, '
      
        '   INSUMOS_OUTROS_ANIMAIS, MOVIMENTA_ESTOQUE, NOME, PEC_DAP_MOVT' +
        'O, PERDA_CONSUMO, '
      
        '   SAIDA, TIPO, TIPO_FISCAL, TIPO_MOVTO, TOTALIZA_RELATORIO_MOV_' +
        'PRODUTO, '
      '   VENDA_DIRETA)'
      'values'
      
        '  (:CODIGO, :CODIGO_TBL_DAP, :CONTA, :ENTRADA, :GERA_CREDITO_ICM' +
        'S, :INSUMOS, '
      
        '   :INSUMOS_OUTROS_ANIMAIS, :MOVIMENTA_ESTOQUE, :NOME, :PEC_DAP_' +
        'MOVTO, '
      
        '   :PERDA_CONSUMO, :SAIDA, :TIPO, :TIPO_FISCAL, :TIPO_MOVTO, :TO' +
        'TALIZA_RELATORIO_MOV_PRODUTO, '
      '   :VENDA_DIRETA)')
    RefreshSQL.Strings = (
      'Select * '
      'from operacoes '
      'where'
      '  CODIGO = :CODIGO')
    SelectSQL.Strings = (
      'select * from operacoes'
      'where codigo = :codigo')
    ModifySQL.Strings = (
      'update operacoes'
      'set'
      '  CODIGO = :CODIGO,'
      '  CODIGO_TBL_DAP = :CODIGO_TBL_DAP,'
      '  CONTA = :CONTA,'
      '  ENTRADA = :ENTRADA,'
      '  GERA_CREDITO_ICMS = :GERA_CREDITO_ICMS,'
      '  INSUMOS = :INSUMOS,'
      '  INSUMOS_OUTROS_ANIMAIS = :INSUMOS_OUTROS_ANIMAIS,'
      '  MOVIMENTA_ESTOQUE = :MOVIMENTA_ESTOQUE,'
      '  NOME = :NOME,'
      '  PEC_DAP_MOVTO = :PEC_DAP_MOVTO,'
      '  PERDA_CONSUMO = :PERDA_CONSUMO,'
      '  SAIDA = :SAIDA,'
      '  TIPO = :TIPO,'
      '  TIPO_FISCAL = :TIPO_FISCAL,'
      '  TIPO_MOVTO = :TIPO_MOVTO,'
      
        '  TOTALIZA_RELATORIO_MOV_PRODUTO = :TOTALIZA_RELATORIO_MOV_PRODU' +
        'TO,'
      '  VENDA_DIRETA = :VENDA_DIRETA'
      'where'
      '  CODIGO = :OLD_CODIGO')
    GeneratorField.Field = 'CODIGO'
    GeneratorField.Generator = 'GEN_OPERACOES_ID'
    GeneratorField.ApplyEvent = gamOnPost
    Left = 384
    Top = 328
    object dtEditCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"OPERACOES"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtEditNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"OPERACOES"."NOME"'
      Size = 50
    end
    object dtEditCONTA: TIntegerField
      FieldName = 'CONTA'
      Origin = '"OPERACOES"."CONTA"'
    end
    object dtEditTIPO: TIBStringField
      FieldName = 'TIPO'
      Origin = '"OPERACOES"."TIPO"'
      OnChange = dtEditTIPOChange
      FixedChar = True
      Size = 1
    end
    object dtEditTIPO_MOVTO: TIBStringField
      FieldName = 'TIPO_MOVTO'
      Origin = '"OPERACOES"."TIPO_MOVTO"'
      FixedChar = True
      Size = 1
    end
    object dtEditTIPO_FISCAL: TIBStringField
      FieldName = 'TIPO_FISCAL'
      Origin = '"OPERACOES"."TIPO_FISCAL"'
      FixedChar = True
      Size = 1
    end
    object dtEditGERA_CREDITO_ICMS: TIBStringField
      FieldName = 'GERA_CREDITO_ICMS'
      Origin = '"OPERACOES"."GERA_CREDITO_ICMS"'
      FixedChar = True
      Size = 1
    end
    object dtEditMOVIMENTA_ESTOQUE: TIBStringField
      FieldName = 'MOVIMENTA_ESTOQUE'
      Origin = '"OPERACOES"."MOVIMENTA_ESTOQUE"'
      FixedChar = True
      Size = 1
    end
    object dtEditPERDA_CONSUMO: TIBStringField
      FieldName = 'PERDA_CONSUMO'
      Origin = '"OPERACOES"."PERDA_CONSUMO"'
      FixedChar = True
      Size = 1
    end
    object dtEditVENDA_DIRETA: TIBStringField
      FieldName = 'VENDA_DIRETA'
      Origin = '"OPERACOES"."VENDA_DIRETA"'
      FixedChar = True
      Size = 1
    end
    object dtEditENTRADA: TIBStringField
      FieldName = 'ENTRADA'
      Origin = '"OPERACOES"."ENTRADA"'
      FixedChar = True
      Size = 1
    end
    object dtEditSAIDA: TIBStringField
      FieldName = 'SAIDA'
      Origin = '"OPERACOES"."SAIDA"'
      FixedChar = True
      Size = 1
    end
    object dtEditINSUMOS: TIBStringField
      FieldName = 'INSUMOS'
      Origin = '"OPERACOES"."INSUMOS"'
      FixedChar = True
      Size = 1
    end
    object dtEditINSUMOS_OUTROS_ANIMAIS: TIBStringField
      FieldName = 'INSUMOS_OUTROS_ANIMAIS'
      Origin = '"OPERACOES"."INSUMOS_OUTROS_ANIMAIS"'
      FixedChar = True
      Size = 1
    end
    object dtEditTOTALIZA_RELATORIO_MOV_PRODUTO: TIBStringField
      FieldName = 'TOTALIZA_RELATORIO_MOV_PRODUTO'
      Origin = '"OPERACOES"."TOTALIZA_RELATORIO_MOV_PRODUTO"'
      FixedChar = True
      Size = 1
    end
    object dtEditPEC_DAP_MOVTO: TSmallintField
      FieldName = 'PEC_DAP_MOVTO'
      Origin = '"OPERACOES"."PEC_DAP_MOVTO"'
    end
    object dtEditCODIGO_TBL_DAP: TIntegerField
      FieldName = 'CODIGO_TBL_DAP'
      Origin = '"OPERACOES"."CODIGO_TBL_DAP"'
      OnGetText = dtEditCODIGO_TBL_DAPGetText
      OnSetText = dtEditCODIGO_TBL_DAPSetText
    end
  end
  inherited dtList: TIBQuery
    SQL.Strings = (
      'select o.codigo, o.perda_consumo, o.nome, o.conta, case o.tipo'
      'when '#39'A'#39' then '#39'Agr'#237'cola'#39
      'when '#39'P'#39' then '#39'Pecu'#225'ria'#39
      'end tipo, p.nome nome_conta,'
      ' gera_credito_icms ,o.entrada, o.saida,'
      'venda_direta'
      
        '    ,movimenta_estoque, o.insumos, o.insumos_outros_animais, COD' +
        'IGO_TBL_DAP from operacoes o'
      'left join plano_conta p on (p.codigo = o.conta)')
    Left = 352
    Top = 328
    object dtListCODIGO: TIntegerField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'CODIGO'
      Origin = '"OPERACOES"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtListNOME: TIBStringField
      DisplayLabel = 'Nome'
      FieldName = 'NOME'
      Origin = '"OPERACOES"."NOME"'
      Size = 50
    end
    object dtListCONTA: TIntegerField
      DisplayLabel = 'C'#243'd. Conta'
      FieldName = 'CONTA'
      Origin = '"OPERACOES"."CONTA"'
    end
    object dtListNOME_CONTA: TIBStringField
      DisplayLabel = 'Conta'
      FieldName = 'NOME_CONTA'
      Origin = '"PLANO_CONTA"."NOME"'
      Size = 50
    end
    object dtListTIPO: TIBStringField
      DisplayLabel = 'Tipo'
      FieldName = 'TIPO'
      ProviderFlags = []
      FixedChar = True
      Size = 8
    end
    object dtListGERA_CREDITO_ICMS: TIBStringField
      DisplayLabel = 'Cr'#233'd. ICMS'
      FieldName = 'GERA_CREDITO_ICMS'
      Origin = '"OPERACOES"."GERA_CREDITO_ICMS"'
      FixedChar = True
      Size = 1
    end
    object dtListMOVIMENTA_ESTOQUE: TIBStringField
      DisplayLabel = 'Mov. Estoque'
      FieldName = 'MOVIMENTA_ESTOQUE'
      Origin = '"OPERACOES"."MOVIMENTA_ESTOQUE"'
      FixedChar = True
      Size = 1
    end
    object dtListPERDA_CONSUMO: TIBStringField
      DisplayLabel = 'Perda/Consumo'
      FieldName = 'PERDA_CONSUMO'
      Origin = '"OPERACOES"."PERDA_CONSUMO"'
      FixedChar = True
      Size = 1
    end
    object dtListVENDA_DIRETA: TIBStringField
      DisplayLabel = 'Vd. Direta'
      FieldName = 'VENDA_DIRETA'
      Origin = '"OPERACOES"."VENDA_DIRETA"'
      FixedChar = True
      Size = 1
    end
    object dtListENTRADA: TIBStringField
      DisplayLabel = 'Entrada'
      FieldName = 'ENTRADA'
      Origin = '"OPERACOES"."ENTRADA"'
      FixedChar = True
      Size = 1
    end
    object dtListSAIDA: TIBStringField
      DisplayLabel = 'Sa'#237'da'
      FieldName = 'SAIDA'
      Origin = '"OPERACOES"."SAIDA"'
      FixedChar = True
      Size = 1
    end
    object dtListINSUMOS: TIBStringField
      DisplayLabel = 'Insumos'
      FieldName = 'INSUMOS'
      Origin = '"OPERACOES"."INSUMOS"'
      FixedChar = True
      Size = 1
    end
    object dtListINSUMOS_OUTROS_ANIMAIS: TIBStringField
      DisplayLabel = 'Ins. Out. Animais'
      FieldName = 'INSUMOS_OUTROS_ANIMAIS'
      Origin = '"OPERACOES"."INSUMOS_OUTROS_ANIMAIS"'
      FixedChar = True
      Size = 1
    end
    object dtListCODIGO_TBL_DAP: TIntegerField
      DisplayLabel = 'C'#243'd. TBL DAP'
      FieldName = 'CODIGO_TBL_DAP'
      Origin = '"OPERACOES"."CODIGO_TBL_DAP"'
    end
  end
  inherited dxBarManager: TdxBarManager
    Categories.ItemsVisibles = (
      2
      2)
    Categories.Visibles = (
      True
      True)
    Left = 320
    Top = 328
    DockControlHeights = (
      0
      0
      0
      26)
  end
  inherited ActionList1: TActionList
    Left = 264
    Top = 328
    inherited ActCadLookup: TAction
      OnExecute = ActCadLookupExecute
    end
  end
  inherited dsLink: TDataSource
    Left = 544
    Top = 328
  end
  inherited cxImageList1: TcxImageList
    FormatVersion = 1
    DesignInfo = 24445280
  end
  inherited dxBarDBNavigator1: TdxBarDBNavigator
    Left = 296
    Top = 328
  end
  inherited GridPopupMenu: TcxGridPopupMenu
    Left = 384
    Top = 373
  end
  inherited SaveDialog: TSaveDialog
    Left = 216
    Top = 328
  end
  inherited ACBrEnterTab1: TACBrEnterTab
    Left = 512
    Top = 372
  end
  inherited cxPropertiesStore: TcxPropertiesStore
    Components = <
      item
        Component = Owner
        Properties.Strings = (
          'Action'
          'ActiveControl'
          'Align'
          'AlphaBlend'
          'AlphaBlendValue'
          'Anchors'
          'AutoScroll'
          'AutoSize'
          'BiDiMode'
          'BorderIcons'
          'BorderStyle'
          'BorderWidth'
          'Caption'
          'ClientHeight'
          'ClientWidth'
          'Color'
          'Constraints'
          'Ctl3D'
          'Cursor'
          'DefaultMonitor'
          'DockSite'
          'DragKind'
          'DragMode'
          'Enabled'
          'Font'
          'FormStyle'
          'Height'
          'HelpContext'
          'HelpFile'
          'HelpKeyword'
          'HelpType'
          'Hint'
          'HorzScrollBar'
          'Icon'
          'KeyPreview'
          'Left'
          'Menu'
          'Name'
          'ObjectMenuItem'
          'OldCreateOrder'
          'ParentBiDiMode'
          'ParentFont'
          'PixelsPerInch'
          'PopupMenu'
          'Position'
          'PrintScale'
          'Scaled'
          'ScreenSnap'
          'ShowHint'
          'SnapBuffer'
          'Tag'
          'Top'
          'TransparentColor'
          'TransparentColorValue'
          'UseDockManager'
          'VertScrollBar'
          'Visible'
          'Width'
          'WindowMenu'
          'WindowState')
      end
      item
        Component = Grid
        Properties.Strings = (
          'Align'
          'Anchors'
          'BevelEdges'
          'BevelInner'
          'BevelKind'
          'BevelOuter'
          'BevelWidth'
          'BorderStyle'
          'BorderWidth'
          'Constraints'
          'Cursor'
          'DragCursor'
          'DragKind'
          'DragMode'
          'DragOpening'
          'DragOpeningWaitTime'
          'Enabled'
          'Font'
          'Height'
          'HelpContext'
          'HelpKeyword'
          'HelpType'
          'Hint'
          'Left'
          'LevelTabs'
          'LookAndFeel'
          'Name'
          'ParentFont'
          'PopupMenu'
          'RootLevelOptions'
          'RootLevelStyles'
          'TabOrder'
          'TabStop'
          'Tag'
          'Top'
          'Visible'
          'Width')
      end
      item
        Component = GridDBBandedTableView1
        Properties.Strings = (
          'BackgroundBitmaps'
          'Bands'
          'DataController'
          'DateTimeHandling'
          'DragMode'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FilterBox'
          'Filtering'
          'FilterRow'
          'Name'
          'NavigatorButtons'
          'NewItemRow'
          'OptionsBehavior'
          'OptionsCustomize'
          'OptionsData'
          'OptionsSelection'
          'OptionsView'
          'PopupMenu'
          'Preview'
          'Styles'
          'Synchronization'
          'Tag')
      end
      item
        Component = GridDBBandedTableView2
        Properties.Strings = (
          'BackgroundBitmaps'
          'Bands'
          'DataController'
          'DateTimeHandling'
          'DragMode'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FilterBox'
          'Filtering'
          'FilterRow'
          'Name'
          'NavigatorButtons'
          'NewItemRow'
          'OptionsBehavior'
          'OptionsCustomize'
          'OptionsData'
          'OptionsSelection'
          'OptionsView'
          'PopupMenu'
          'Preview'
          'Styles'
          'Synchronization'
          'Tag')
      end
      item
        Component = GridDBBandedTableView2CODIGO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2CODIGO_TBL_DAP
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2CONTA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2ENTRADA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2GERA_CREDITO_ICMS
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2INSUMOS
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2INSUMOS_OUTROS_ANIMAIS
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2MOVIMENTA_ESTOQUE
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2NOME
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2NOME_CONTA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2PERDA_CONSUMO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2SAIDA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2TIPO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2VENDA_DIRETA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end>
    Left = 240
    Top = 328
  end
  inherited cxIntl1: TcxIntl
    Left = 187
    Top = 328
  end
  object dsConta: TDataSource
    DataSet = lstConta
    Left = 512
    Top = 328
  end
  object lstConta: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      'select * from plano_conta p'
      
        'where 0 = (select count(*) from plano_conta p2 where p2.codigo_p' +
        'ai = p.codigo)')
    Left = 416
    Top = 328
    object lstContaCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"PLANO_CONTA"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstContaCODIGO_STR: TIBStringField
      FieldName = 'CODIGO_STR'
      Origin = '"PLANO_CONTA"."CODIGO_STR"'
      Size = 30
    end
    object lstContaCODIGO_PAI: TIntegerField
      FieldName = 'CODIGO_PAI'
      Origin = '"PLANO_CONTA"."CODIGO_PAI"'
    end
    object lstContaTRIBUTAVEL: TIBStringField
      FieldName = 'TRIBUTAVEL'
      Origin = '"PLANO_CONTA"."TRIBUTAVEL"'
      FixedChar = True
      Size = 1
    end
    object lstContaTIPO: TIBStringField
      FieldName = 'TIPO'
      Origin = '"PLANO_CONTA"."TIPO"'
      FixedChar = True
      Size = 1
    end
    object lstContaNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"PLANO_CONTA"."NOME"'
      Size = 50
    end
  end
end
